home *** CD-ROM | disk | FTP | other *** search
/ MacWorld: Super Stacks! / Macworld CD.iso / Stack Catalogs / maxStax+™ Catalog / Business .maxstax+ / card_20867.txt < prev    next >
Text File  |  1990-04-03  |  1KB  |  56 lines
  1. -- card: 20867 from stack: in.maxstax+
  2. -- bmap block id: 39014
  3. -- flags: 0000
  4. -- background id: 20504
  5. -- name: N5087
  6.  
  7.  
  8. -- part 2 (button)
  9. -- low flags: 00
  10. -- high flags: A004
  11. -- rect: left=38 top=259 right=291 bottom=124
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Demo
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   push cd
  23.   set cursor to none
  24.   visual dissolve
  25.   set the hilite of me to true
  26.   go next
  27.   play "harpsichord" tempo 200 58
  28.   wait 3 secs
  29.   repeat with x = 1 to number of cds of this bg -2
  30.     play "harpsichord" tempo 200 62 + x
  31.     visual wipe down
  32.     go next
  33.     wait 3 secs
  34.     add 1 to x
  35.   end repeat
  36.   visual iris close
  37.   pop cd
  38.   play "harpsichord" tempo 200 g# A#
  39.   set the hilite of me to false
  40. end mouseUp
  41.  
  42.  
  43.  
  44. -- part 3 (button)
  45. -- low flags: 00
  46. -- high flags: 8001
  47. -- rect: left=316 top=319 right=334 bottom=355
  48. -- title width / last selected line: 0
  49. -- icon id / first selected line: 0 / 0
  50. -- text alignment: 1
  51. -- font id: 3
  52. -- text size: 9
  53. -- style flags: 256
  54. -- line height: 12
  55. -- part name: 1|17
  56.